home *** CD-ROM | disk | FTP | other *** search
/ Komputer for Alle 2003 #12 / K-CD-12-2003.ISO / LookDisk / Look disk setup.exe / #setuppath# / LDW.EXE / 0 / RCDATA / TDLGSHARE1 / TDLGSHARE1.txt
Encoding:
Text File  |  2003-04-25  |  3.2 KB  |  127 lines

  1. object DlgShare1: TDlgShare1
  2.   Left = 198
  3.   Top = 76
  4.   ActiveControl = BitBtn1
  5.   BorderIcons = [biSystemMenu, biMinimize]
  6.   BorderStyle = bsSingle
  7.   Caption = 'LookDisk Shareware-Version'
  8.   ClientHeight = 419
  9.   ClientWidth = 548
  10.   Font.Color = clWindowText
  11.   Font.Height = -13
  12.   Font.Name = 'System'
  13.   Font.Style = []
  14.   PixelsPerInch = 96
  15.   Position = poScreenCenter
  16.   Scaled = False
  17.   OnClose = FormClose
  18.   OnCreate = FormCreate
  19.   TextHeight = 16
  20.   object Label1: TLabel
  21.     Left = 19
  22.     Top = 331
  23.     Width = 270
  24.     Height = 18
  25.     Caption = 'Anzahl verbleibende Programmstarts: '
  26.     Font.Color = clBlack
  27.     Font.Height = -15
  28.     Font.Name = 'Arial'
  29.     Font.Style = [fsBold]
  30.     ParentFont = False
  31.   end
  32.   object LRemaining: TLabel
  33.     Left = 302
  34.     Top = 330
  35.     Width = 27
  36.     Height = 19
  37.     Caption = '30'
  38.     Font.Color = clRed
  39.     Font.Height = -16
  40.     Font.Name = 'Arial'
  41.     Font.Style = [fsBold]
  42.     ParentFont = False
  43.   end
  44.   object Memo1: TMemo
  45.     Left = 4
  46.     Top = 5
  47.     Width = 539
  48.     Height = 316
  49.     Font.Color = clBlack
  50.     Font.Height = -12
  51.     Font.Name = 'Arial'
  52.     Font.Style = []
  53.     Lines.Strings = (
  54.       
  55.         'LookDisk wird als Shareware-Programm vertrieben. Das heisst, das' +
  56.         's Sie LookDisk'
  57.       
  58.         'zuerst in Ruhe testen k∩┐╜nnen und falls es Ihnen gef∩┐╜llt und es w' +
  59.         'eiterhin ben∩┐╜tzen m∩┐╜chten,'
  60.       
  61.         'Sie die Vollversion bestellen k∩┐╜nnen. Durch die Bestellung der V' +
  62.         'ollversion erhalten Sie eine'
  63.       
  64.         'LookDisk-Version ohne dieses Hinweis-Fenster und das Recht neue ' +
  65.         'Versionen zu einem'
  66.       'g∩┐╜nstigeren Preis beziehen zu k∩┐╜nnen.'
  67.       ''
  68.       
  69.         'Diese Shareware-Version von LookDisk k∩┐╜nnen Sie 30 mal starten w' +
  70.         'obei Ihnen s∩┐╜mtliche'
  71.       'Funktionen der Vollversion zur Verf∩┐╜gung stehen!'
  72.       
  73.         'Sollte es nicht m∩┐╜glich sein das Bestellformular (BESTELL.TXT) z' +
  74.         'u drucken so senden'
  75.       'Sie einen Check ∩┐╜ber DM 40.-- an folgende Adresse:'
  76.       '       Iuorno Software'
  77.       '       Z∩┐╜rcherstr. 15'
  78.       '       CH-8500 Frauenfeld/Schweiz'
  79.       
  80.         'CompuServe-Benutzer k∩┐╜nnen die Vollversion auch direkt ∩┐╜ber SWRE' +
  81.         'G bestellen'
  82.       '(GO SWREG, ID-Nr. 8491).'
  83.       
  84.         'Mitteilungen, Anregungen und Kritiken senden Sie bitte auch an o' +
  85.         'bengenannte'
  86.       
  87.         'Adresse oder ∩┐╜ber CompuServe an: 100315,3460 oder ∩┐╜ber Internet ' +
  88.         'an:'
  89.       '100315.3460@compuserve.com'
  90.       ''
  91.       'Viel Spass beim Testen von LookDisk!')
  92.     ParentFont = False
  93.     ParentShowHint = False
  94.     ReadOnly = True
  95.     ShowHint = False
  96.     TabOrder = 0
  97.     WordWrap = False
  98.   end
  99.   object BitBtn1: TBitBtn
  100.     Left = 19
  101.     Top = 372
  102.     Width = 89
  103.     Height = 33
  104.     Font.Color = clBlack
  105.     Font.Height = -13
  106.     Font.Name = 'Arial'
  107.     Font.Style = []
  108.     ParentFont = False
  109.     TabOrder = 1
  110.     Kind = bkOK
  111.   end
  112.   object BitBtn2: TBitBtn
  113.     Left = 136
  114.     Top = 372
  115.     Width = 201
  116.     Height = 33
  117.     Caption = '&Bestellformular drucken'
  118.     Font.Color = clBlack
  119.     Font.Height = -13
  120.     Font.Name = 'Arial'
  121.     Font.Style = []
  122.     ParentFont = False
  123.     TabOrder = 2
  124.     OnClick = BitBtn2Click
  125.   end
  126. end
  127.